CD Fun House 8

home *** CD-ROM | disk | FTP | other *** search

/ CD Fun House 8 / CD Funhouse Version 8.0 - Wayzata Technology (7013) (1993).iso / pc / mac / __intere / ad&d_pc_.5__ / background_2812.xml < prev next >

Wrap

Extensible Markup Language | 1992-11-11 | 108KB | 2,097 lines

<?xml version="1.0" encoding="utf-8" ?> <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" > <background> <id>2812</id> <filler1>0</filler1> <bitmap>BMAP_3218.pbm</bitmap> <cantDelete> <true /> </cantDelete> <showPict> <true /> </showPict> <dontSearch> <false /> </dontSearch> <link rel="stylesheet" type="text/css" href="stylesheet_4048.css" /> <part> <id>12</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>52</top> <right>180</right> <bottom>67</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Class</name> <script>on mousedownput the rect of me into myPlaceput item 1 of myPlace into horizput item 2 of myPlace into vertget HPopUpMenu("Warrior,Fighter,Ranger,Paladin"&return¬¨&"Wizard,Mage,Abjurer,Conjurer,Diviner,Enchanter,Illusionist,Invoker,Necromancer,Transmuter"&return¬¨&"Priest,Cleric,Druid"&return¬¨&"Rogue,Thief,Bard", 0, vert, horiz)put item 1 of it into xput item 2 of it into yif x is 1 thenif y is 2 thenput "Fighter" into meelse if y is 3 thenput "Ranger" into meelse if y is 4 thenput "Paladin" into meend ifelse if x is 2 thenif y is 2 thenput "Mage" into meelse if y is 3 thenput "Abjurer" into meelse if y is 4 thenput "Conjurer" into meelse if y is 5 thenput "Diviner" into meelse if y is 6 thenput "Enchanter" into meelse if y is 7 thenput "Illusionist" into meelse if y is 8 thenput "Invoker" into meelse if y is 9 thenput "Necromancer" into meelse if y is 10 thenput "Transmuter" into meend ifelse if x is 3 thenif y is 2 thenput "Cleric" into meelse if y is 3 thenput "Druid" into meend ifelse if x is 4 thenif y is 2 thenput "Thief" into meelse if y is 3 thenput "Bard" into meend ifend ifif (fld "Class" = "Bard" or fld "Class" = "Druid"¬¨or fld "Class" = "Conjurer" or fld "Class" = "Transmuter")¬¨and (fld "Race" ‚â† "Human" and fld "Race" ‚â† "Half-Elf")then answer "Only humans or half-elves can be that class !"if (fld "Class" = "Abjurer" or fld "Class" = "Invoker"¬¨or fld "Class" = "Necromancer" or fld "Class" = "Paladin")¬¨and fld "Race" ‚â† "Human"then answer "Only humans can be that class !"if (fld "Class" = "Mage" or fld "Class" = "Ranger"¬¨or fld "Class" = "Enchanter") and fld "Race" is not in "HumanHalf-Elf"then answer "Only humans, half-elves, and elves can be that class !"if fld "Class" = "Illusionist" and fld "Race" is not in "GnomeHuman"then answer "Your race cannot be that class !"if fld "Str" is empty thenclick at loc of fld "Str" -- start rnd scriptend ifend mousedown</script> </part> <part> <id>14</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>66</top> <right>192</right> <bottom>81</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Alignment</name> <script>on mouseDownput the rect of me into myPlaceput item 1 of myPlace into horizput item 2 of myPlace into vertput "Good,Lawful Good,Neutral Good,Chaotic Good" & return¬¨& "Neutral,Lawful Neutral,True Neutral,Chaotic Neutral" & return¬¨& "Evil,Lawful Evil,Neutral Evil,Chaotic Evil" into alignmentget HPopUpMenu(alignment, 0, vert, horiz)if item 2 of it is 2 then put "Lawful " into word 1 of meif item 2 of it is 3 then put "Neutral " into word 1 of meif item 2 of it is 4 then put "Chaotic " into word 1 of meif item 1 of it is 1 then put "Good" into word 2 of meif item 1 of it is 2 then put "Neutral" into word 2 of meif item 1 of it is 3 then put "Evil" into word 2 of meif item 1 of it is 2 and item 2 of it is 3then put "True Neutral" into meend mouseDown</script> </part> <part> <id>15</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>126</top> <right>118</right> <bottom>141</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Age</name> <script>on mouseUpif fld "Race" is "Dwarf" thenput rnd(70,40) into meelse if fld "Race" is "Elf" thenput rnd(130,100) into meelse if fld "Race" is "Gnome" thenput rnd(96,60) into meelse if fld "Race" is "Half-Elf" thenput rnd(21,15) into meelse if fld "Race" is "Halfling" thenput rnd(42,20) into meelse if fld "Race" is "Human" thenput rnd(19,15) into meend ifend mouseUp</script> </part> <part> <id>16</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>140</top> <right>139</right> <bottom>155</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Sex</name> <script>on mousedownput the rect of me into myPlaceput item 1 of myPlace into horizput item 2 of myPlace into vertif me is "Female" then put 2 into selse put 1 into sget HPopUpMenu("Male" & return & "Female", s, vert, horiz)if item 1 of it is 1 then put "Male" into meelse if item 1 of it is 2 then put "Female" into meclick at loc of fld "Height"click at loc of fld "Weight"end mousedown</script> </part> <part> <id>17</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>87</left> <top>155</top> <right>115</right> <bottom>170</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Height</name> <script>on mouseUpif fld "Race" is "Dwarf" and fld "Sex" is "Male" thenput rnd(53,43) into meelse if fld "Race" is "Dwarf" and fld "Sex" is "Female" thenput rnd(51,41) into meelse if fld "Race" is "Elf" and fld "Sex" is "Male" thenput rnd(65,55) into meelse if fld "Race" is "Elf" and fld "Sex" is "Female" thenput rnd(60,50) into meelse if fld "Race" is "Gnome" and fld "Sex" is "Male" thenput rnd(44,38) into meelse if fld "Race" is "Gnome" and fld "Sex" is "Female" thenput rnd (42,36) into meelse if fld "Race" is "Half-Elf" and fld "Sex" is "Male" thenput rnd(72,60) into meelse if fld "Race" is "Half-Elf" and fld "Sex" is "Female" thenput rnd(70,58) into meelse if fld "Race" is "Halfling" and fld "Sex" is "Male" thenput rnd(48,32) into meelse if fld "Race" is "Halfling" and fld "Sex" is "Female" thenput rnd (46,30) into meelse if fld "Race" is "Human" and fld "Sex" is "Male" thenput rnd(80,60) into meelse if fld "Race" is "Human" and fld "Sex" is "Female" thenput rnd(79,59) into meend ifend mouseUp</script> </part> <part> <id>19</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>87</left> <top>168</top> <right>115</right> <bottom>183</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Weight</name> <script>on mouseUpif fld "Race" is "Dwarf" and fld "Sex" is "Male" thenput rnd(170,134) into meelse if fld "Race" is "Dwarf" and fld "Sex" is "Female" thenput rnd(145,109) into meelse if fld "Race" is "Elf" and fld "Sex" is "Male" thenput rnd(120,93) into meelse if fld "Race" is "Elf" and fld "Sex" is "Female" thenput rnd(100,73) into meelse if fld "Race" is "Gnome" and fld "Sex" is "Male" thenput rnd(92,77) into meelse if fld "Race" is "Gnome" and fld "Sex" is "Female" thenput rnd (88,73) into meelse if fld "Race" is "Half-Elf" and fld "Sex" is "Male" thenput rnd(146,113) into meelse if fld "Race" is "Half-Elf" and fld "Sex" is "Female" thenput rnd(121,88) into meelse if fld "Race" is "Halfling" and fld "Sex" is "Male" thenput rnd(72,57) into meelse if fld "Race" is "Halfling" and fld "Sex" is "Female" thenput rnd (68,53) into meelse if fld "Race" is "Human" and fld "Sex" is "Male" thenput rnd(200,146) into meelse if fld "Race" is "Human" and fld "Sex" is "Female" thenput rnd(160,106) into meend ifend mouseUp</script> </part> <part> <id>21</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>0</top> <right>235</right> <bottom>15</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Char Name</name> <script>on mouseupif fld "Char Name" is empty thenask "Name of the new Character ?" with charnameelseask "New name of Character ?" with meend ifput it into meclick at loc of fld "Player Name"end mouseup</script> </part> <part> <id>22</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>14</top> <right>235</right> <bottom>29</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Player Name</name> <script>on mouseupif fld "Player Name" is empty thenask "Name of the player ?" with playnameelseask "New player ?" with meend ifput it into meend mouseup</script> </part> <part> <id>23</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>87</left> <top>182</top> <right>210</right> <bottom>249</bottom> </rect> <style>transparent</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Langss</name> <script></script> </part> <part> <id>24</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>292</left> <top>25</top> <right>314</right> <bottom>40</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>STR</name> <script>on mouseUpgenerateif fld "Race" is "Halfling" then add -1 to meif fld "Str" is "18" thenclick at loc of fld "Str Mod"exit mouseUpend ifif fld "Class" = "Fighter" and fld "Str" < "9" then do mouseUpelse if fld "Class" = "Paladin" and fld "Str" < "12" then do mouseUpelse if fld "Class" = "Ranger"and fld "Str" <"13" then do mouseUpupdateTotalsend mouseUp</script> </part> <part> <id>25</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>39</top> <right>328</right> <bottom>54</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Hit Prob</name> <script>on mouseupif fld "Str" = "1" thenput "-5" into meelse if fld "Str" ‚â• "2" and fld "Str" ‚â§ "3" thenput "-3" into meelse if fld "Str" ‚â• "4" and fld "Str" ‚â§ "5" thenput "-2" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "7" thenput "-1" into meelse if fld "Str" ‚â• "8" and fld "Str" ‚â§ "16" thenput "Norm" into meelse if fld "Str" = "17" thenput "+1" into meelse if fld "Str" = "18" thenput "+1" into meelse if fld "Str" = "19" thenput "+3" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "50" thenput "+1" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "51" and¬¨fld "Str Mod" ‚â§ "99" thenput "+2" into meelse if fld "Str" = "18" and fld "Str Mod" = "100" thenput "+3" into meend ifend mouseup</script> </part> <part> <id>26</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>53</top> <right>324</right> <bottom>68</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Dam Adj</name> <script>on mouseupif fld "Str" = "1" thenput "-4" into meelse if fld "Str" = "2" thenput "-2" into meelse if fld "Str" ‚â• "3" and fld "Str" ‚â§ "5" thenput "-1" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "15" thenput "Nil" into meelse if fld "Str" ‚â• "16" and fld "Str" ‚â§ "17" thenput "+1" into meelse if fld "Str" = "18" thenput "+2" into meelse if fld "Str" = "19" thenput "+7" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "75" thenput "+3" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "76" and¬¨fld "Str Mod" ‚â§ "90" thenput "+4" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "91" and¬¨fld "Str Mod" ‚â§ "99" thenput "+5" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "100" thenput "+6" into meend ifclick at loc of fld "To Hit/Dam Mod"end mouseup</script> </part> <part> <id>27</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>67</top> <right>324</right> <bottom>82</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Weight Allow</name> <script>on mouseupif fld "Str" = "1" thenput "1" into meelse if fld "Str" = "2" thenput "1" into meelse if fld "Str" = "3" thenput "5" into meelse if fld "Str" ‚â• "4" and fld "Str" ‚â§ "5" thenput "10" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "7" thenput "20" into meelse if fld "Str" ‚â• "8" and fld "Str" ‚â§ "9" thenput "35" into meelse if fld "Str" ‚â• "10" and fld "Str" ‚â§ "11" thenput "40" into meelse if fld "Str" ‚â• "12" and fld "Str" ‚â§ "13" thenput "45" into meelse if fld "Str" ‚â• "14" and fld "Str" ‚â§ "15" thenput "55" into meelse if fld "Str" = "16" thenput "70" into meelse if fld "Str" = "17" thenput "85" into meelse if fld "Str" = "18" thenput "110" into meelse if fld "Str" = "19" thenput "485" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "50" thenput "135" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "51" and¬¨fld "Str Mod" ‚â§ "75" thenput "160" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "76" and¬¨fld "Str Mod" ‚â§ "90" thenput "185" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "91" and¬¨fld "Str Mod" ‚â§ "99" thenput "235" into meelse if fld "Str" = "18" and fld "Str Mod" = "100" thenput "335" into meend ifend mouseup</script> </part> <part> <id>28</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>81</top> <right>324</right> <bottom>96</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Max Press</name> <script>on mouseupif fld "Str" = "1" thenput "3" into meelse if fld "Str" = "2" thenput "5" into meelse if fld "Str" = "3" thenput "10" into meelse if fld "Str" ‚â• "4" and fld "Str" ‚â§ "5" thenput "25" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "7" thenput "55" into meelse if fld "Str" ‚â• "8" and fld "Str" ‚â§ "9" thenput "90" into meelse if fld "Str" ‚â• "10" and fld "Str" ‚â§ "11" thenput "115" into meelse if fld "Str" ‚â• "12" and fld "Str" ‚â§ "13" thenput "140" into meelse if fld "Str" ‚â• "14" and fld "Str" ‚â§ "15" thenput "170" into meelse if fld "Str" = "16" thenput "195" into meelse if fld "Str" = "17" thenput "220" into meelse if fld "Str" = "18" thenput "255" into meelse if fld "Str" = "19" thenput "495" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "50" thenput "280" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "51" and¬¨fld "Str Mod" ‚â§ "75" thenput "305" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "76" and¬¨fld "Str Mod" ‚â§ "90" thenput "330" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "91" and¬¨fld "Str Mod" ‚â§ "99" thenput "380" into meelse if fld "Str" = "18" and fld "Str Mod" = "100" thenput "480" into meexit mouseupend ifend mouseup</script> </part> <part> <id>29</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>95</top> <right>324</right> <bottom>110</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Open Doors</name> <script>on mouseupif fld "Str" = "1" thenput "1" into meelse if fld "Str" = "2" thenput "1" into meelse if fld "Str" = "3" thenput "2" into meelse if fld "Str" ‚â• "4" and fld "Str" ‚â§ "5" thenput "3" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "7" thenput "4" into meelse if fld "Str" ‚â• "8" and fld "Str" ‚â§ "9" thenput "5" into meelse if fld "Str" ‚â• "10" and fld "Str" ‚â§ "11" thenput "6" into meelse if fld "Str" ‚â• "12" and fld "Str" ‚â§ "13" thenput "7" into meelse if fld "Str" ‚â• "14" and fld "Str" ‚â§ "15" thenput "8" into meelse if fld "Str" = "16" thenput "9" into meelse if fld "Str" = "17" thenput "10" into meelse if fld "Str" = "18" thenput "11" into meelse if fld "Str" = "19" thenput "16(8)" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "50" thenput "12" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "51" and¬¨fld "Str Mod" ‚â§ "75" thenput "13" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "76" and¬¨fld "Str Mod" ‚â§ "90" thenput "14" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "91" and¬¨fld "Str Mod" ‚â§ "99" thenput "15/3" into meelse if fld "Str" = "18" and fld "Str Mod" = "100" thenput "16/6" into meend ifend mouseup</script> </part> <part> <id>30</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>109</top> <right>324</right> <bottom>124</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Bend Bars/Lift Gates</name> <script>on mouseupif fld "Str" = "1" thenput "0%" into meelse if fld "Str" = "2" thenput "0%" into meelse if fld "Str" = "3" thenput "0%" into meelse if fld "Str" ‚â• "4" and fld "Str" ‚â§ "5" thenput "0%" into meelse if fld "Str" ‚â• "6" and fld "Str" ‚â§ "7" thenput "0%" into meelse if fld "Str" ‚â• "8" and fld "Str" ‚â§ "9" thenput "1%" into meelse if fld "Str" ‚â• "10" and fld "Str" ‚â§ "11" thenput "2%" into meelse if fld "Str" ‚â• "12" and fld "Str" ‚â§ "13" thenput "4%" into meelse if fld "Str" ‚â• "14" and fld "Str" ‚â§ "15" thenput "7%" into meelse if fld "Str" = "16" thenput "10%" into meelse if fld "Str" = "17" thenput "13%" into meelse if fld "Str" = "18" thenput "16%" into meelse if fld "Str" = "19" thenput "50%" into meend ifif fld "Str" = "18" and fld "Str Mod" ‚â• "1" and¬¨fld "Str Mod" ‚â§ "50" thenput "20%" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "51" and¬¨fld "Str Mod" ‚â§ "75" thenput "25%" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "76" and¬¨fld "Str Mod" ‚â§ "90" thenput "30%" into meelse if fld "Str" = "18" and fld "Str Mod" ‚â• "91" and¬¨fld "Str Mod" ‚â§ "99" thenput "35%" into meelse if fld "Str" = "18" and fld "Str Mod" = "100" thenput "40%" into meend ifend mouseup</script> </part> <part> <id>31</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>251</top> <right>119</right> <bottom>266</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Movement Rate</name> <script>on mouseUpif fld "Str" ‚â§ "2" thenif fld "Encumberance" ‚â§ 1 thenput 1 into mrelse if fld "Encumberance" is 2 thenput 1.2 into mrelse if fld "Encumberance" is 3 thenput 12/7 into mrelse if fld "Encumberance" is 4 thenput 3 into mrelse if fld "Encumberance" is 5 thenput 12 into mrend ifelse if fld "Str" = "3" thenif fld "Encumberance" ‚â§ 5 thenput 1 into mrelse if fld "Encumberance" is 6 thenput 1.2 into mrelse if fld "Encumberance" is 7 thenput 1.5 into mrelse if fld "Encumberance" is 8 thenput 2.2 into mrelse if fld "Encumberance" is 9 thenput 4 into mrend ifelse if fld "Str" ‚â• 4 thenput fld "Encumberance"/fld "Weight Allow" into mrend ifif fld "Race" is in "DwarfHalflingGnome" then put 6 into bmif fld "Race" is in "Half-ElfHuman" then put 12 into bmput trunc(1/mr*bm) into meif fld "Race" is in "DwarfHalflingGnome" ¬¨and fld "Movement Rate" > 6 thenput 6 into meelse if fld "Race" is in "Half-ElfHuman"¬¨and fld "Movement Rate" > 12 thenput 12 into meend ifend mouseUp</script> </part> <part> <id>32</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>265</top> <right>119</right> <bottom>280</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Encumberance</name> <script>on mouseUpset lockScreen to trueset lockRecent to trueset lockMessages to truego nextif fld "Weapons" is empty thenanswer "You haven't bought weapons." with "OK"go firstexit mouseUpend ifgo nextif fld "Equip" is empty thenanswer "You haven't bought gear." with "OK"go firstexit mouseUpend ifput 1 into xput 3 into encumrepeat until line x of fld "Equip" is emptyadd line x of fld "Weight" to encumadd 1 to xend repeatgo prevput 1 into xrepeat until line x of fld "Weapons" is emptyadd line x of fld "Weight" to encumadd 1 to xend repeatgo prevput encum into meclick at the loc of bg fld "Movement Rate"end mouseUp</script> </part> <part> <id>33</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>322</left> <top>25</top> <right>344</right> <bottom>40</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Str Mod</name> <script>on mouseUpput the random of 100 into meclick at loc of fld "Hit Prob"click at loc of fld "Dam Adj"click at loc of fld "Weight Allow"click at loc of fld "Max Press"click at loc of fld "Open Doors"click at loc of fld "Bend Bars/Lift Gates"if fld "Str" < 18 then put empty into meend mouseUp</script> </part> <part> <id>34</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>292</left> <top>132</top> <right>314</right> <bottom>147</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Dex</name> <script>on mouseUpgenerateif fld "Race" is "Halfling" then add 1 to meif fld "Race" is "Elf" then add 1 to meif fld "Class" is "Ranger" and fld "Dex" < "13" then do mouseUpelse if fld "Class" is "Thief" and fld "Dex" < "9" then do mouseUpelse if fld "Class" is "Bard" and fld "Dex" < "12" then do mouseUpelse if fld "Class" is "Illusionist" and fld "Dex" < "16" then do mouseUpelse if fld "Class" is "Transmuter" and fld "Dex" < "15" then do mouseUpend mouseUp</script> </part> <part> <id>35</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>146</top> <right>324</right> <bottom>161</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Reaction Adj</name> <script>on mouseupif fld "Dex" = "1" thenput "-6" into meelse if fld "Dex" = "2" thenput "-4" into meelse if fld "Dex" = "3" thenput "-3" into meelse if fld "Dex" = "4" thenput "-2" into meelse if fld "Dex" = "5" thenput "-1" into meelse if fld "Dex" ‚â• "6" and fld "Dex" ‚â§ "15" thenput "0" into meelse if fld "Dex" = "16" thenput "+1" into meelse if fld "Dex" = "17" thenput "+2" into meelse if fld "Dex" = "18" thenput "+2" into meelse if fld "Dex" = "19" thenput "+3" into meend ifend mouseup</script> </part> <part> <id>36</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>160</top> <right>324</right> <bottom>175</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Missile Att Adj</name> <script>on mouseupif fld "Dex" = "1" thenput "-6" into meelse if fld "Dex" = "2" thenput "-4" into meelse if fld "Dex" = "3" thenput "-3" into meelse if fld "Dex" = "4" thenput "-2" into meelse if fld "Dex" = "5" thenput "-1" into meelse if fld "Dex" ‚â• "6" and fld "Dex" ‚â§ "15" thenput "0" into meelse if fld "Dex" = "16" thenput "+1" into meelse if fld "Dex" = "17" thenput "+2" into meelse if fld "Dex" = "18" thenput "+2" into meelse if fld "Dex" = "19" thenput "+3" into meend ifend mouseup</script> </part> <part> <id>37</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>174</top> <right>324</right> <bottom>189</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Defence Adj</name> <script>on mouseupif fld "Dex" = "1" thenput "+5" into meelse if fld "Dex" = "2" thenput "+5" into meelse if fld "Dex" = "3" thenput "+4" into meelse if fld "Dex" = "4" thenput "+3" into meelse if fld "Dex" = "5" thenput "+2" into meelse if fld "Dex" = "6" thenput "+1" into meelse if fld "Dex" ‚â• "7" and fld "Dex" ‚â§ "14" thenput "0" into meelse if fld "Dex" = "15" thenput "-1" into meelse if fld "Dex" = "16" thenput "-2" into meelse if fld "Dex" = "17" thenput "-3" into meelse if fld "Dex" = "18" thenput "-4" into meelse if fld "Dex" = "19" thenput "-4" into meend ifend mouseup</script> </part> <part> <id>38</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>292</left> <top>195</top> <right>314</right> <bottom>210</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Con</name> <script>on mouseUpgenerateif fld "Race" is "Dwarf" then add 1 to meif fld "Race" is "Elf" then add -1 to meif fld "Class" is "Ranger" and fld "Con" < "14" then do mouseUpelse if fld "Class" is "Paladin" and fld "Con" < "9" then do mouseUpelse if fld "Class" is "Conjurer" and fld "Con" < "15" then do mouseUpelse if fld "Class" is "Invoker" and fld "Con" < "16" then do mouseUpend mouseUp</script> </part> <part> <id>39</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>209</top> <right>324</right> <bottom>224</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Hit Point Adj</name> <script>on mouseupif fld "Con" = "1" thenput "-3" into meelse if fld "Con" = "2" thenput "-2" into meelse if fld "Con" = "3" thenput "-2" into meelse if fld "Con" = "4" thenput "-1" into meelse if fld "Con" = "5" thenput "-1" into meelse if fld "Con" = "6" thenput "-1" into meelse if fld "Con" ‚â• "7" and fld "Con" ‚â§ "14" thenput "0" into meelse if fld "Con" = "15" thenput "1" into meelse if fld "Con" ‚â• "16" thenput "2" into meend ifif fld "Con" = "17" and fld "Class" = "Fighter" thenput "3" into meelse if fld "Con" = "17" and fld "Class" = "Ranger" thenput "3" into meelse if fld "Con" = "17" and fld "Class" = "Paladin" thenput "3" into meelse if fld "Con" = "18" and fld "Class" = "Fighter" thenput "4" into meelse if fld "Con" = "18" and fld "Class" = "Ranger" thenput "4" into meelse if fld "Con" = "18" and fld "Class" = "Paladin" thenput "4" into meelse if fld "Con" = "19" and fld "Class" = "Fighter" thenput "5" into meelse if fld "Con" = "19" and fld "Class" = "Ranger" thenput "5" into meelse if fld "Con" = "19" and fld "Class" = "Paladin" thenput "5" into meend ifend mouseup</script> </part> <part> <id>40</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>223</top> <right>324</right> <bottom>238</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>System Shock</name> <script>on mouseupif fld "Con" ‚â• "1" and fld "Con" ‚â§ "13" thenput fld "Con"*5+20 & "%" into meelse if fld "Con" = "14" thenput "88%" into meelse if fld "Con" = "15" thenput "90%" into meelse if fld "Con" = "16" thenput "95%" into meelse if fld "Con" = "17" thenput "97%" into meelse if fld "Con" ‚â• "18" thenput "99%" into meend ifend mouseup</script> </part> <part> <id>41</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>237</top> <right>324</right> <bottom>252</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Resurr Survival</name> <script>on mouseupif fld "Con" ‚â• "1" and fld "Con" ‚â§ "13" thenput fld "Con"*5+25 & "%" into meelse if fld "Con" = "14" thenput "92%" into meelse if fld "Con" = "15" thenput "94%" into meelse if fld "Con" = "16" thenput "96%" into meelse if fld "Con" = "17" thenput "98%" into meelse if fld "Con" ‚â• "18" thenput "100%" into meend ifend mouseup</script> </part> <part> <id>42</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>251</top> <right>324</right> <bottom>266</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Poison Save</name> <script>on mouseupif fld "Con" = "1" thenput "-2" into meelse if fld "Con" = "2" thenput "-1" into meelse if fld "Con" ‚â• "3" and fld "Con" ‚â§ "18" thenput "0" into meelse if fld "Con" = "19" thenput "+1" into meend ifend mouseup</script> </part> <part> <id>43</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>292</left> <top>265</top> <right>324</right> <bottom>280</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Regeneration</name> <script>on mouseUpif fld "Con" ‚â• "1" and fld "Con" ‚â§ "19" thenput "Nil" into meend ifend mouseup</script> </part> <part> <id>44</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>455</left> <top>0</top> <right>477</right> <bottom>15</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Int</name> <script>on mouseUpgenerateif fld "Race" is "Gnome" then add 1 to meif fld "Class" is "Mage" and fld "Int" < "9" then do mouseUpelse if fld "Class" is "Bard" and fld "Int" < "13" then do mouseUpend mouseUp</script> </part> <part> <id>45</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>455</left> <top>86</top> <right>477</right> <bottom>101</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Wis</name> <script>on mouseUpgenerateif fld "Race" is "Gnome" then add -1 to meif fld "Class" is "Paladin" and fld "Wis" < "13" then do mouseUpelse if fld "Class" is "Ranger" and fld "Wis" < "14" then do mouseUpelse if fld "Class" is "Cleric" and fld "Wis" < "9" then do mouseUpelse if fld "Class" is "Druid" and fld "Wis" < "12" then do mouseUpelse if fld "Class" is "Abjurer" and fld "Wis" < "15" then do mouseUpelse if fld "Class" is "Diviner" and fld "Wis" < "16" then do mouseUpelse if fld "Class" is "Necromancer" and fld "Wis" < "16" then do mouseUpend mouseUp</script> </part> <part> <id>46</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>455</left> <top>159</top> <right>477</right> <bottom>174</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Chr</name> <script>on mouseUpgenerateif fld "Race" is "Dwarf" then add -1 to meif fld "Class" is "Paladin" and fld "Chr" < "17" then do mouseUpelse if fld "Class" is "Druid" and fld "Chr" < "15" then do mouseUpelse if fld "Class" is "Bard" and fld "Chr" < "15" then do mouseUpelse if fld "Class" is "Enchanter" and fld "Chr" < "16" then do mouseUpend mouseUp</script> </part> <part> <id>47</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>236</top> <right>477</right> <bottom>251</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Para/Poison/Death Magic</name> <script>on mouseUpif fld Lvl is empty thenanswer "You forgot to enter the experience level." with "OK"end ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "3" then put "10" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "9" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "9" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "9" then put "7" into meif fld "Lvl" ‚â• "10" and fld "Lvl" ‚â§ "12" then put "6" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "15" then put "5" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "18" then put "4" into meif fld "Lvl" ‚â• "19" then put "2" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "13" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "12" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "11" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "16" then put "10" into meif fld "Lvl" ‚â• "17" and fld "Lvl" ‚â§ "20" then put "9" into meif fld "Lvl" ‚â• "21" then put "8" into meend ifif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "2" then put "14" into meif fld "Lvl" ‚â• "3" and fld "Lvl" ‚â§ "4" then put "13" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "6" then put "11" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "8" then put "10" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "10" then put "8" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "12" then put "7" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "14" then put "5" into meif fld "Lvl" ‚â• "15" and fld "Lvl" ‚â§ "16" then put "4" into meif fld "Lvl" ‚â• "17" then put "3" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "5" then put "14" into meif fld "Lvl" ‚â• "6" and fld "Lvl" ‚â§ "10" then put "13" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "15" then put "11" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "20" then put "10" into meif fld "Lvl" ‚â• "21" then put "8" into meend ifclick at the loc of fld "Mod P/P/D M"end mouseUp</script> </part> <part> <id>48</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>173</top> <right>487</right> <bottom>188</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Max# Henchmen</name> <script>on mouseupif fld "Chr" = "1" thenput "0" into meelse if fld "Chr" ‚â• "2" and fld "Chr" ‚â§ "4" thenput "1" into meelse if fld "Chr" ‚â• "5" and fld "Chr" ‚â§ "6" thenput "2" into meelse if fld "Chr" ‚â• "7" and fld "Chr" ‚â§ "8" thenput "3" into meelse if fld "Chr" ‚â• "9" and fld "Chr" ‚â§ "11" thenput "4" into meelse if fld "Chr" ‚â• "12" and fld "Chr" ‚â§ "13" thenput "5" into meelse if fld "Chr" = "14" thenput "6" into meelse if fld "Chr" = "15" thenput "7" into meelse if fld "Chr" = "16" thenput "8" into meelse if fld "Chr" = "17" thenput "10" into meelse if fld "Chr" = "18" thenput "15" into meelse if fld "Chr" = "19" thenput "20" into meend ifend mouseup</script> </part> <part> <id>49</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>187</top> <right>487</right> <bottom>202</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Loyalty Base</name> <script>on mouseupif fld "Chr" ‚â• "1" and fld "Chr" ‚â§ "8" thenput fld "Chr" -9 into meelse if fld "Chr" ‚â• "9" and fld "Chr" ‚â§ "13" thenput "0" into meelse if fld "Chr" = "14" thenput "+1" into meelse if fld "Chr" = "15" thenput "+3" into meelse if fld "Chr" ‚â• "16" thenput "+" & (fld "Chr"-14)*2 into meend ifend mouseup</script> </part> <part> <id>50</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>201</top> <right>487</right> <bottom>216</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Reaction Adj 2</name> <script>on mouseupif fld "Chr" ‚â• "1" and fld "Chr" ‚â§ "7" thenput fld "Chr"-8 into meelse if fld "Chr" ‚â• "8" and fld "Chr" ‚â§ "12" thenput "0" into meelse if fld "Chr" ‚â• "13" and fld "Chr" ‚â§ "15" thenput "+" & fld "Chr"-12 into meelse if fld "Chr" ‚â• "16" thenput "+" & fld "Chr"-11 into meend ifend mouseup</script> </part> <part> <id>51</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>14</top> <right>487</right> <bottom>29</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name># of Lang</name> <script>on mouseupif fld "Int" = "1" thenput "0" into meelse if fld "Int" ‚â• "2" and fld "Int" ‚â§ "8" thenput "1" into meelse if fld "Int" ‚â• "9" and fld "Int" ‚â§ "11" thenput "2" into meelse if fld "Int" ‚â• "12" and fld "Int" ‚â§ "13" thenput "3" into meelse if fld "Int" ‚â• "14" and fld "Int" ‚â§ "15" thenput "4" into meelse if fld "Int" = "16" thenput "5" into meelse if fld "Int" = "17" thenput "6" into meelse if fld "Int" = "18" thenput "7" into meelse if fld "Int" = "19" thenput "8" into meend ifend mouseup</script> </part> <part> <id>52</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>28</top> <right>487</right> <bottom>43</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Spell Level</name> <script>on mouseupif fld "Int" ‚â• "1" and fld "Int" ‚â§ "8" thenput "--" into meelse if fld "Int" = "9" thenput "4th" into meelse if fld "Int" ‚â• "10" and fld "Int" ‚â§ "11" thenput "5th" into meelse if fld "Int" ‚â• "12" and fld "Int" ‚â§ "13" thenput "6th" into meelse if fld "Int" ‚â• "14" and fld "Int" ‚â§ "15" thenput "7th" into meelse if fld "Int" ‚â• "16" and fld "Int" ‚â§ "17" thenput "8th" into meelse if fld "Int" ‚â• "18" and fld "Int" ‚â§ "25" thenput "9th" into meend ifend mouseup</script> </part> <part> <id>53</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>42</top> <right>487</right> <bottom>57</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Chance to Lrn</name> <script>on mouseupif fld "Int" ‚â• "1" and fld "Int" ‚â§ "8" thenput "--" into meelse if fld "Int" = "9" thenput "35%" into meelse if fld "Int" = "10" thenput "40%" into meelse if fld "Int" = "11" thenput "45%" into meelse if fld "Int" = "12" thenput "50%" into meelse if fld "Int" = "13" thenput "55%" into meelse if fld "Int" = "14" thenput "60%" into meelse if fld "Int" = "15" thenput "65%" into meelse if fld "Int" = "16" thenput "70%" into meelse if fld "Int" = "17" thenput "75%" into meelse if fld "Int" = "18" thenput "85%" into meelse if fld "Int" = "19" thenput "95%" into meend ifend mouseup</script> </part> <part> <id>54</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>56</top> <right>487</right> <bottom>71</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Max # Sp/Lvl</name> <script>on mouseupif fld "Int" ‚â• "1" and fld "Int" ‚â§ "8" thenput "--" into meelse if fld "Int" = "9" thenput "6" into meelse if fld "Int" ‚â• "10" and fld "Int" ‚â§ "12" thenput "7" into meelse if fld "Int" ‚â• "13" and fld "Int" ‚â§ "14" thenput "9" into meelse if fld "Int" ‚â• "15" and fld "Int" ‚â§ "16" thenput "11" into meelse if fld "Int" = "17" thenput "14" into meelse if fld "Int" = "18" thenput "18" into meelse if fld "Chr" = "19" thenput "All" into meend ifend mouseup</script> </part> <part> <id>55</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>70</top> <right>487</right> <bottom>85</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Sp Immunity</name> <script>on mouseupif fld "Int" ‚â• "1" and fld "Int" ‚â§ "18" thenput "--" into meelse if fld "Int" = "19" thenput "1st" into meend ifend mouseup</script> </part> <part> <id>56</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>100</top> <right>487</right> <bottom>115</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Magic Def Adj</name> <script>on mouseupif fld "Wis" = "1" thenput "-6" into meelse if fld "Wis" = "2" thenput "-4" into meelse if fld "Wis" = "3" thenput "-3" into meelse if fld "Wis" = "4" thenput "-2" into meelse if fld "Wis" ‚â• "5" and fld "Wis" ‚â§ "7" thenput "-1" into meelse if fld "Wis" ‚â• "8" and fld "Dex" ‚â§ "14" thenput "0" into meelse if fld "Wis" = "15" thenput "+1" into meelse if fld "Wis" = "16" thenput "+2" into meelse if fld "Wis" = "17" thenput "+3" into meelse if fld "Wis" = "18" thenput "+4" into meelse if fld "Wis" = "19" thenput "+4" into meend ifend mouseup</script> </part> <part> <id>57</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>114</top> <right>505</right> <bottom>129</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Bonus Spells</name> <script>on mouseupif fld "Wis" ‚â• "1" and fld "Wis" ‚â§ "12" thenput "--" into meelse if fld "Wis" = "13" thenput "1" into meelse if fld "Wis" = "14" thenput "2" into meelse if fld "Wis" = "15" thenput "2,1" into meelse if fld "Wis" = "16" thenput "2,2" into meelse if fld "Wis" = "17" thenput "2,2,1" into meelse if fld "Wis" = "18" thenput "2,2,1,1" into meelse if fld "Wis" = "19" thenput "3,2,1,2" into meend ifend mouseup</script> </part> <part> <id>58</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>87</top> <right>121</right> <bottom>102</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Lvl</name> <script>on mousedownput the rect of me into myPlaceput item 1 of myPlace + 85 into horizput item 2 of myPlace + 85 into vertrepeat with x=1 to 20put x & return after lvlListend repeatget HPopUpMenu(lvlList, fld "Lvl", vert, horiz)if it ‚â• 1 then put item 1 of it into fld "Lvl"click at loc of fld "Exp"click at loc of fld "THAC0"click at loc of fld "Hit Points"click at loc of fld "To Hit/Dam Mod"click at loc of fld "Rear Attack"click at loc of fld "Para/Poison/Death Magic"click at loc of fld "Rod/Staff/Wand"click at loc of fld "Petri/Poly"click at loc of fld "Breath"click at loc of fld "Spell"end mousedown</script> </part> <part> <id>59</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>101</top> <right>164</right> <bottom>116</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Exp</name> <script>on mouseUpif fld "Class" = "Fighter" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "2,000" into meif fld "Lvl" = "3" then put "4,000" into meif fld "Lvl" = "4" then put "8,000" into meif fld "Lvl" = "5" then put "16,000" into meif fld "Lvl" = "6" then put "32,000" into meif fld "Lvl" = "7" then put "64,000" into meif fld "Lvl" = "8" then put "125,000" into meif fld "Lvl" = "9" then put "250,000" into meif fld "Lvl" = "10" then put "500,000" into meif fld "Lvl" = "11" then put "750,000" into meif fld "Lvl" = "12" then put "1,000,000" into meif fld "Lvl" = "13" then put "1,250,000" into meif fld "Lvl" = "14" then put "1,500,000" into meif fld "Lvl" = "15" then put "1,750,000" into meif fld "Lvl" = "16" then put "2,000,000" into meif fld "Lvl" = "17" then put "2,250,000" into meif fld "Lvl" = "18" then put "2,500,000" into meif fld "Lvl" = "19" then put "2,750,000" into meif fld "Lvl" ‚â• "20" then put "3,000,000" into meend ifif fld "Class" = "Ranger" or fld "Class" = "Paladin" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "2,250" into meif fld "Lvl" = "3" then put "4,500" into meif fld "Lvl" = "4" then put "9,000" into meif fld "Lvl" = "6" then put "36,000" into meif fld "Lvl" = "7" then put "75,000" into meif fld "Lvl" = "8" then put "150,000" into meif fld "Lvl" = "9" then put "300,000" into meif fld "Lvl" = "10" then put "600,000" into meif fld "Lvl" = "11" then put "900,000" into meif fld "Lvl" = "12" then put "1,200,000" into meif fld "Lvl" = "13" then put "1,500,000" into meif fld "Lvl" = "14" then put "1,800,000" into meif fld "Lvl" = "16" then put "2,400,000" into meif fld "Lvl" = "17" then put "2,700,000" into meif fld "Lvl" = "18" then put "3,000,000" into meif fld "Lvl" = "19" then put "3,300,000" into meif fld "Lvl" ‚â• "20" then put "3,600,000" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "2,500" into meif fld "Lvl" = "3" then put "5,000" into meif fld "Lvl" = "4" then put "10,000" into meif fld "Lvl" = "5" then put "20,000" into meif fld "Lvl" = "6" then put "40,000" into meif fld "Lvl" = "7" then put "60,000" into meif fld "Lvl" = "8" then put "90,000" into meif fld "Lvl" = "9" then put "135,000" into meif fld "Lvl" = "10" then put "250,000" into meif fld "Lvl" = "11" then put "375,000" into meif fld "Lvl" = "12" then put "750,000" into meif fld "Lvl" = "13" then put "1,125,000" into meif fld "Lvl" = "14" then put "1,500,000" into meif fld "Lvl" = "15" then put "1,875,000" into meif fld "Lvl" = "16" then put "2,250,000" into meif fld "Lvl" = "17" then put "2,625,000" into meif fld "Lvl" = "18" then put "3,000,000" into meif fld "Lvl" = "19" then put "3,375,000" into meif fld "Lvl" ‚â• "20" then put "3,750,000" into meend ifif fld "Class" = "Cleric" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "1,500" into meif fld "Lvl" = "3" then put "3,000" into meif fld "Lvl" = "4" then put "6,000" into meif fld "Lvl" = "5" then put "13,000" into meif fld "Lvl" = "6" then put "27,500" into meif fld "Lvl" = "7" then put "55,000" into meif fld "Lvl" = "8" then put "110,000" into meif fld "Lvl" = "9" then put "225,000" into meif fld "Lvl" = "10" then put "450,000" into meif fld "Lvl" = "11" then put "675,000" into meif fld "Lvl" = "12" then put "900,000" into meif fld "Lvl" = "13" then put "1,125,000" into meif fld "Lvl" = "14" then put "1,350,000" into meif fld "Lvl" = "15" then put "1,575,000" into meif fld "Lvl" = "16" then put "1,800,000" into meif fld "Lvl" = "17" then put "2,025,000" into meif fld "Lvl" = "18" then put "2,250,000" into meif fld "Lvl" = "19" then put "2,475,000" into meif fld "Lvl" ‚â• "20" then put "2,700,000" into meend ifif fld "Class" = "Druid" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "2,000" into meif fld "Lvl" = "3" then put "4,000" into meif fld "Lvl" = "4" then put "7,500" into meif fld "Lvl" = "5" then put "12,500" into meif fld "Lvl" = "6" then put "20,000" into meif fld "Lvl" = "7" then put "35,000" into meif fld "Lvl" = "8" then put "60,000" into meif fld "Lvl" = "9" then put "90,000" into meif fld "Lvl" = "10" then put "125,000" into meif fld "Lvl" = "11" then put "200,000" into meif fld "Lvl" = "12" then put "300,000" into meif fld "Lvl" = "13" then put "750,000" into meif fld "Lvl" = "14" then put "1,500,000" into meif fld "Lvl" = "15" then put "3,000,000" into meif fld "Lvl" = "16" then put "3,500,000" into meif fld "Lvl" = "17" then put "500,000*" into meif fld "Lvl" = "18" then put "1,000,000" into meif fld "Lvl" = "19" then put "1,500,000" into meif fld "Lvl" ‚â• "20" then put "2,000,000" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" = "1" then put "0" into meif fld "Lvl" = "2" then put "1,250" into meif fld "Lvl" = "3" then put "2,500" into meif fld "Lvl" = "4" then put "5,000" into meif fld "Lvl" = "5" then put "10,000" into meif fld "Lvl" = "6" then put "20,000" into meif fld "Lvl" = "7" then put "40,000" into meif fld "Lvl" = "8" then put "70,000" into meif fld "Lvl" = "9" then put "110,000" into meif fld "Lvl" = "10" then put "160,000" into meif fld "Lvl" = "11" then put "220,000" into meif fld "Lvl" = "12" then put "440,000" into meif fld "Lvl" = "13" then put "660,000" into meif fld "Lvl" = "14" then put "880,000" into meif fld "Lvl" = "15" then put "1,100,000" into meif fld "Lvl" = "16" then put "1,320,000" into meif fld "Lvl" = "17" then put "1,540,000" into meif fld "Lvl" = "18" then put "1,760,000" into meif fld "Lvl" = "19" then put "1,980,000" into meif fld "Lvl" ‚â• "20" then put "2,200,000" into meend ifend mouseup</script> </part> <part> <id>60</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>250</top> <right>477</right> <bottom>265</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Rod/Staff/Wand</name> <script>on mouseUpif fld Lvl is empty thenanswer "You forgot to enter the experience level." with "OK"exit mouseupend ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "3" then put "14" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "13" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "9" then put "11" into meif fld "Lvl" ‚â• "10" and fld "Lvl" ‚â§ "12" then put "10" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "15" then put "9" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "18" then put "8" into meif fld "Lvl" ‚â• "19" then put "6" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "14" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "12" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "10" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "16" then put "8" into meif fld "Lvl" ‚â• "17" and fld "Lvl" ‚â§ "20" then put "6" into meif fld "Lvl" ‚â• "21" then put "4" into meend ifif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" = "0" then put "18" into meif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "2" then put "16" into meif fld "Lvl" ‚â• "3" and fld "Lvl" ‚â§ "4" then put "15" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "6" then put "13" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "8" then put "12" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "10" then put "10" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "12" then put "9" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "14" then put "7" into meif fld "Lvl" ‚â• "15" and fld "Lvl" ‚â§ "16" then put "6" into meif fld "Lvl" ‚â• "17" then put "5" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "5" then put "11" into meif fld "Lvl" ‚â• "6" and fld "Lvl" ‚â§ "10" then put "9" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "15" then put "7" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "20" then put "5" into meif fld "Lvl" ‚â• "21" then put "3" into meend ifclick at loc of fld "Mod R/S/W"end mouseUp</script> </part> <part> <id>61</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>264</top> <right>477</right> <bottom>279</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Petri/Poly</name> <script>on mouseUpif fld Lvl is empty thenanswer "You forgot to enter the experience level." with "OK"exit mouseupend ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "3" then put "13" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "12" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "9" then put "10" into meif fld "Lvl" ‚â• "10" and fld "Lvl" ‚â§ "12" then put "9" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "15" then put "8" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "18" then put "7" into meif fld "Lvl" ‚â• "19" then put "5" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "12" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "11" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "10" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "16" then put "9" into meif fld "Lvl" ‚â• "17" and fld "Lvl" ‚â§ "20" then put "8" into meif fld "Lvl" ‚â• "21" then put "7" into meend ifif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" = "0" then put "17" into fld "Petri/Poly"if fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "2" then put "15" into meif fld "Lvl" ‚â• "3" and fld "Lvl" ‚â§ "4" then put "14" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "6" then put "12" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "8" then put "11" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "10" then put "9" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "12" then put "8" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "14" then put "6" into meif fld "Lvl" ‚â• "15" and fld "Lvl" ‚â§ "16" then put "5" into meif fld "Lvl" ‚â• "17" then put "4" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "5" then put "13" into meif fld "Lvl" ‚â• "6" and fld "Lvl" ‚â§ "10" then put "11" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "15" then put "9" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "20" then put "7" into meif fld "Lvl" ‚â• "21" then put "5" into meend ifclick at loc of fld "Mod P/P"end mouseUp</script> </part> <part> <id>62</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>278</top> <right>477</right> <bottom>293</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Breath</name> <script>on mouseUpif fld Lvl is empty thenanswer "You forgot to enter the experience level." with "OK"exit mouseupend ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "3" then put "16" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "15" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "9" then put "13" into meif fld "Lvl" ‚â• "10" and fld "Lvl" ‚â§ "12" then put "12" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "15" then put "11" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "18" then put "10" into meif fld "Lvl" ‚â• "19" then put "8" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "16" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "15" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "14" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "16" then put "13" into meif fld "Lvl" ‚â• "17" and fld "Lvl" ‚â§ "20" then put "12" into meif fld "Lvl" ‚â• "21" then put "11" into meend ifif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" = "0" then put "20" into fld "Breath"if fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "2" then put "17" into meif fld "Lvl" ‚â• "3" and fld "Lvl" ‚â§ "4" then put "16" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "6" then put "13" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "8" then put "12" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "10" then put "9" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "12" then put "8" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "14" then put "5" into meif fld "Lvl" ‚â• "15" and fld "Lvl" ‚â§ "16" then put "4" into meif fld "Lvl" ‚â• "17" then put "4" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "5" then put "15" into meif fld "Lvl" ‚â• "6" and fld "Lvl" ‚â§ "10" then put "13" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "15" then put "11" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "20" then put "9" into meif fld "Lvl" ‚â• "21" then put "7" into meend ifclick at loc of fld "Mod B"end mouseUp</script> </part> <part> <id>63</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>292</top> <right>477</right> <bottom>307</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Spell</name> <script>on mouseUpif fld Lvl is empty thenanswer "You forgot to enter the experience level." with "OK"exit mouseupend ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "3" then put "15" into meif fld "Lvl" ‚â• "4" and fld "Lvl" ‚â§ "6" then put "14" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "9" then put "12" into meif fld "Lvl" ‚â• "10" and fld "Lvl" ‚â§ "12" then put "11" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "15" then put "10" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "18" then put "9" into meif fld "Lvl" ‚â• "19" then put "7" into meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "15" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "13" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "11" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "16" then put "9" into meif fld "Lvl" ‚â• "17" and fld "Lvl" ‚â§ "20" then put "7" into meif fld "Lvl" ‚â• "21" then put "5" into meend ifif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" = "0" then put "19" into fld "Spell"if fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "2" then put "17" into meif fld "Lvl" ‚â• "3" and fld "Lvl" ‚â§ "4" then put "16" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "6" then put "14" into meif fld "Lvl" ‚â• "7" and fld "Lvl" ‚â§ "8" then put "13" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "10" then put "11" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "12" then put "10" into meif fld "Lvl" ‚â• "13" and fld "Lvl" ‚â§ "14" then put "8" into meif fld "Lvl" ‚â• "15" and fld "Lvl" ‚â§ "16" then put "7" into meif fld "Lvl" ‚â• "17" then put "6" into meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "5" then put "12" into meif fld "Lvl" ‚â• "6" and fld "Lvl" ‚â§ "10" then put "10" into meif fld "Lvl" ‚â• "11" and fld "Lvl" ‚â§ "15" then put "8" into meif fld "Lvl" ‚â• "16" and fld "Lvl" ‚â§ "20" then put "6" into meif fld "Lvl" ‚â• "21" then put "4" into meend ifclick at loc of fld "Mod S"if fld "Race" = "Dwarf" thenif fld "Con" ‚â• "4" and fld "Con" ‚â§ "6" thenadd -1 to fld "Para/Poison/Death Magic"add -1 to fld "Rod/Staff/Wand"add -1 to meelse if fld "Con" ‚â• "7" and fld "Con" ‚â§ "10" thenadd "-2" to fld "Para/Poison/Death Magic"add "-2" to fld "Rod/Staff/Wand"add "-2" to meelse if fld "Con" ‚â• "11" and fld "Con" ‚â§ "13" thenadd "-3" to fld "Para/Poison/Death Magic"add "-3" to fld "Rod/Staff/Wand"add "-3" to meelse if fld "Con" ‚â• "14" and fld "Con" ‚â§ "17" thenadd "-4" to fld "Para/Poison/Death Magic"add "-4" to fld "Rod/Staff/Wand"add "-4" to meelse if fld "Con" ‚â•"18" thenadd "-5" to fld "Para/Poison/Death Magic"add "-5" to fld "Rod/Staff/Wand"add "-5" to meend ifend ifend mouseUp</script> </part> <part> <id>64</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>483</left> <top>236</top> <right>510</right> <bottom>255</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Mod P/P/D M</name> <script>on mouseUpput "Spcl" into meend mouseUp</script> </part> <part> <id>69</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>483</left> <top>250</top> <right>510</right> <bottom>265</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Mod R/S/W</name> <script>on mouseUpput "Spcl" into meend mouseUp</script> </part> <part> <id>70</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>483</left> <top>264</top> <right>510</right> <bottom>279</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Mod P/P</name> <script>on mouseUpput fld "System Shock" into meend mouseUp</script> </part> <part> <id>71</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>483</left> <top>278</top> <right>510</right> <bottom>293</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Mod B</name> <script>on mouseUpput "Spcl" into meend mouseUp</script> </part> <part> <id>72</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>483</left> <top>292</top> <right>510</right> <bottom>307</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Mod S</name> <script>on mouseUpput "Spcl" into meend mouseUp</script> </part> <part> <id>73</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>128</top> <right>487</right> <bottom>143</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Chance Sp Fail</name> <script>on mouseupif fld "Wis" = "1" thenput "80%" into meelse if fld "Wis" = "2" thenput "60%" into meelse if fld "Wis" = "3" thenput "50%" into meelse if fld "Wis" = "4" thenput "45%" into meelse if fld "Wis" = "5" thenput "40%" into meelse if fld "Wis" = "6" thenput "35%" into meelse if fld "Wis" = "7" thenput "30%" into meelse if fld "Wis" = "8" thenput "25%" into meelse if fld "Wis" = "9" thenput "20%" into meelse if fld "Wis" = "10" thenput "15%" into meelse if fld "Wis" = "11" thenput "10%" into meelse if fld "Wis" = "12" thenput "5%" into meelse if fld "Wis" ‚â• "13" thenput "0%" into meend ifend mouseup</script> </part> <part> <id>74</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>455</left> <top>142</top> <right>487</right> <bottom>157</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Sp Immunity 2</name> <script>on mouseupif fld "Wis" ‚â• "1" and fld "Wis" ‚â§ "18" thenput "--" into meend ifend mouseup</script> </part> <part> <id>75</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>87</left> <top>297</top> <right>122</right> <bottom>312</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>AC</name> <script></script> </part> <part> <id>76</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <false /> </lockText> <rect> <left>87</left> <top>311</top> <right>122</right> <bottom>326</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Hit Points</name> <script>on mouseupput fld "Hit Point Adj" into hpaif fld "Class" = "Fighter" or fld "Class" = "Ranger" or¬¨fld "Class" = "Paladin" thenif fld "Lvl" = "1" then put random(10) into meif fld "Lvl" ‚â• "2" and fld "Lvl" ‚â§ "9" thenadd random(10) to meelse if fld "Lvl" ‚â• "10" then add 3 to meend ifif fld "Class" = "Mage" or fld "Class" = "Abjurer" or¬¨fld "Class" = "Conjurer" or fld "Class" = "Diviner" or¬¨fld "Class" = "Enchanter" or fld "Class" = "Illusionist" or¬¨fld "Class" = "Invoker" or fld "Class" = "Necromancer" or¬¨fld "Class" = "Transmuter" thenif fld "Lvl" = "1" then put random(4) into meif fld "Lvl" ‚â• "2" and fld "Lvl" ‚â§ "10" thenadd random(4) to meelse if fld "Lvl" ‚â• "11" then add 1 to meend ifif fld "Class" = "Cleric" or fld "Class" = "Druid" thenif fld "Lvl" = "1" then put random(8) into meif fld "Lvl" ‚â• "2" and fld "Lvl" ‚â§ "9" thenadd random(8) to meelse if fld "Lvl" ‚â• "10" then add 2 to meend ifif fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" = "1" then put random(6) into meif fld "Lvl" ‚â• "2" and fld "Lvl" ‚â§ "10" thenadd random(6) to meelse if fld "Lvl" ‚â• "11" thenadd 2 to meend ifend ifif fld "Lvl" < 10 then add hpa to meif fld "Hit Points" <= 0 then put 1 into meend mouseup</script> </part> <part> <id>79</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>211</left> <top>297</top> <right>244</right> <bottom>312</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>THAC0</name> <script>on mouseUpif fld "Class" is "Mage" or fld "Class" is "Abjurer"¬¨or fld "Class" is "Conjurer" or fld "Class" is "Diviner"¬¨or fld "Class" is "Enchanter" or fld "Class" is "Illusionist"¬¨or fld "Class" is "Invoker" or fld "Class" is "Necromancer"¬¨or fld "Class" is "Transmuter" thenput 20 -(trunc ((fld "Lvl"-1)/3)) into meelse if fld "Class" is "Thief" or fld "Class" is "Bard" thenput 20 -(trunc ((fld "Lvl"-1)/2)) into meelse if fld "Class" is "Cleric" or fld "Class" is "Druid" thenput 20 -(trunc ((fld "Lvl"-1)/3)*2) into meelseput 20 - (fld "Lvl"-1) into meend ifend mouseUp</script> </part> <part> <id>80</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>211</left> <top>311</top> <right>279</right> <bottom>327</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>To Hit/Dam Mod</name> <script>on mouseupput fld "Hit Prob" &"/" & fld "Dam Adj" into meend mouseup</script> </part> <part> <id>82</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>211</left> <top>325</top> <right>279</right> <bottom>340</bottom> </rect> <style>opaque</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Rear Attack</name> <script>on mouseupif fld "Class" ‚â† "Thief" and fld "Class" ‚â† "Bard" thenput "+2" into meelse if fld "Class" = "Thief" or fld "Class" = "Bard" thenif fld "Lvl" ‚â• "1" and fld "Lvl" ‚â§ "4" then put "+2 X 2" into meif fld "Lvl" ‚â• "5" and fld "Lvl" ‚â§ "8" then put "+2 X 3" into meif fld "Lvl" ‚â• "9" and fld "Lvl" ‚â§ "12" then put "+2 X 4" into meif fld "Lvl" ‚â• "13" then put "+2 X 5" into meend ifend mouseup</script> </part> <part> <id>86</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <false /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <true /> </autoTab> <lockText> <true /> </lockText> <rect> <left>87</left> <top>38</top> <right>156</right> <bottom>53</bottom> </rect> <style>shadow</style> <autoSelect> <false /> </autoSelect> <showLines> <true /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>condense</textStyle> <textHeight>13</textHeight> <name>Race</name> <script>on mousedownput the rect of me into myPlaceput item 1 of myPlace into horizput item 2 of myPlace into vertput "Dwarf" & return & "Elf" & return & "Half-Elf" & return ¬¨& "Gnome" & return & "Human" & return & "Halfling" into raceListget HPopUpMenu(raceList, 0, vert, horiz)put line (item 1 of it) of raceList into meclick at loc of fld "Age"end mousedown</script> </part> <part> <id>97</id> <type>button</type> <visible> <false /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>345</left> <top>308</top> <right>380</right> <bottom>342</bottom> </rect> <style>transparent</style> <showName> <false /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>783</icon> <textAlign>center</textAlign> <font></font> <textSize>12</textSize> <textStyle>plain</textStyle> <name>AD&D Character Generator</name> <script></script> </part> <part> <id>100</id> <type>button</type> <visible> <true /> </visible> <reserved5> 0 </reserved5> <reserved4> 0 </reserved4> <reserved3> 0 </reserved3> <reserved2> 0 </reserved2> <reserved1> 0 </reserved1> <enabled> <true /> </enabled> <rect> <left>290</left> <top>11</top> <right>371</right> <bottom>25</bottom> </rect> <style>shadow</style> <showName> <true /> </showName> <highlight> <false /> </highlight> <autoHighlight> <false /> </autoHighlight> <sharedHighlight> <true /> </sharedHighlight> <family>0</family> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>center</textAlign> <font>New York</font> <textSize>10</textSize> <textStyle>bold</textStyle> <name>Method 4</name> <script>on mousedownput the rect of me into myPlaceput item 1 of myPlace into horizput item 2 of myPlace into vertrepeat with x=1 to 6put "Method" && x & return after methListend repeatget HPopUpMenu(methList, word 2 of the short name of me, vert, horiz)if it ‚â• 1 then set the name of me to "Method" && item 1 of itend mousedown</script> </part> <part> <id>107</id> <type>field</type> <visible> <true /> </visible> <dontWrap> <false /> </dontWrap> <dontSearch> <false /> </dontSearch> <sharedText> <true /> </sharedText> <fixedLineHeight> <true /> </fixedLineHeight> <autoTab> <false /> </autoTab> <lockText> <true /> </lockText> <rect> <left>156</left> <top>10</top> <right>356</right> <bottom>304</bottom> </rect> <style>scrolling</style> <autoSelect> <false /> </autoSelect> <showLines> <false /> </showLines> <wideMargins> <false /> </wideMargins> <multipleLines> <false /> </multipleLines> <reservedFamily> 0 </reservedFamily> <titleWidth>0</titleWidth> <icon>0</icon> <textAlign>left</textAlign> <font>Geneva</font> <textSize>9</textSize> <textStyle>plain</textStyle> <textHeight>12</textHeight> <name>About</name> <script></script> </part> <content> <layer>background</layer> <id>107</id> <text><span class="style2">bout</span><span class="style1">This stack follows all the 2nd edition rules for AD&D PCs. If you wish to modify the rules/stack, fine.</span><span class="style2">Using</span><span class="style1">All you need to do is click and hold.. If you click on the field ‚ÄúCharacter Name‚Äù, it will ask you for the character‚Äòs & the player‚Äòs name. Clicking & holding down on the following fields will produce a popup menu to make choices from:Race, Class, Alignment, Level, SexMethod</span><span class="style2">Buttons/Palette choices</span><span class="style1">About Btn: ???File Btn: Opens/Saves sheetTrash Btn: Empties all fields.Print Btn: Prints a sheet.Rogue Btn: Visible only if PC deserves rogue abilities.Next/Prev: Goes to the next/previous card.Back: Goes back.Lock: Locks/Unlocks most fields.</span><span class="style2">Menus</span><span class="style1">About: ???Open/Save: Same as file button.Print: Prints sheet.Generate: Creates new scores for your PC.Lock/Unlock: Same as lock button.Trash: Same as button.Install: Copies a button to any stack that will come here.</span><span class="style2">Problems</span><span class="style1">If you have problems, you can contact me at:G. Hutchison801 Woodland Ave.Schenectady, NY 12309America Online: HyperMacII</span><span class="style2">Original Stack & Idea</span><span class="style1">J. LibensonEnjoy. Click on me to cont...</span></text> </content> <name>Char Sheet 1</name> <script></script> </background>